Satisfy compiler for golden-ratio-mode

diff --git a/which-key.el b/which-key.el
index 49731d71d0f2bb90df1bcb9f0c96c9fa35d173c3..7008f1bb64bc751a5058d1fcdb2bfe06cd7e3794 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -42,6 +42,9 @@
 (require 's)
 (require 'dash)
 
+(eval-when-compile
+  (defvar golden-ratio-mode))
+
 (defgroup which-key nil
   "Customization options for which-key-mode"
   :group 'help
@@ -659,7 +662,7 @@ addition KEY-SEQUENCE NAME pairs) to apply."
 RECURSING is for internal use."
   (when recursing (define-key map key def))
   (map-keymap
-   (lambda (ev df)
+   (lambda (_ev df)
      (when (keymapp df)
        (which-key-define-key-recursively df key def t)))
    map))
@@ -1484,6 +1487,7 @@ Will force an update if called before `which-key--update'."
         (which-key--show-page page-n)
         loc2))))
 
+
 (defun which-key--create-buffer-and-show (prefix-keys)
   "Fill `which-key--buffer' with key descriptions and reformat.
 Finally, show the buffer."